home *** CD-ROM | disk | FTP | other *** search
/ ShareWare OnLine 2 / ShareWare OnLine Volume 2 (CMS Software)(1993).iso / os2 / mnicon.zip / INSTALL.CMD next >
OS/2 REXX Batch file  |  1993-02-21  |  404b  |  22 lines
  1. /*** install MNIcon class ***/
  2.  
  3. if RxFuncQuery("SysLoadFuncs") then
  4. do
  5.     call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs';
  6.     call SysLoadFuncs;
  7. end
  8.  
  9. Class = "MNIcon";
  10. DLL = "MNIcon";
  11.  
  12. result = SysRegisterObjectClass(Class, DLL);
  13.  
  14. if result then
  15. do
  16.     say Class "is registered successfully";
  17. end
  18. else
  19. do
  20.     say Class "is not registered (return code:" result||")";
  21. end
  22.